(mode-line-position): Add buffer size indicator.

diff --git a/lisp/bindings.el b/lisp/bindings.el
index fe16b2bcb3450f6a87083004671557402ec9f861..957e51e1ac1439370e8d86060722d935b88fdc18 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -312,6 +312,8 @@ Keymap to display on minor modes.")
 
   (setq-default mode-line-position
     `((-3 . ,(propertize "%p" 'help-echo help-echo))
+      (size-indication-mode 
+       (8 ,(propertize " of %I" 'help-echo help-echo)))
       (line-number-mode
        ((column-number-mode
         (10 ,(propertize " (%l,%c)" 'help-echo help-echo))